home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 2 / Amiga Tools 2.iso / tools / packer / wbsplitter / install next >
Text File  |  1994-12-23  |  2KB  |  121 lines

  1.  
  2. ; Install script for WBSplitter
  3.  
  4. (set old_level @user-level)
  5. (set @default-dest "")
  6.  
  7. (set splitterprg "WBSplitter")
  8. (set splitterdoc "WBSplitter.guide")
  9. (set rqtlib "libs/reqtools.library")
  10. (set lhafile "c/lha")
  11. ;=============================================================================
  12. ; English strings
  13.  
  14.  
  15. (set #bad-kick "You must be using Kickstart 2.04 to install using this script!")
  16.  
  17. (set #where-prg "In which drawer should WBSplitter be installed ?")
  18.  
  19. (set #where-doc "In which drawer should WBSplitter.guide be installed ?")
  20.  
  21. (set #where-lha "In which drawer should Lha be installed ?")
  22.  
  23. (set #confirm-doc "\n\n\nDo you wish to install the documentation ?")
  24.  
  25. (set #confirm-lha "\n\n\nDo you wish to install the Lha proramm ?")
  26.  
  27. (set #copy-reqtools "Copying reqtools.library to Libs:...")
  28.  
  29. (set #copy-lha "Copying Lha programm...")
  30.  
  31. (set #install-msg
  32. (cat "\n\nWBSplitter installation script.\n"
  33.      "This script installs WBSplitter on your Amiga.\n\n"
  34.      "Read the documentation for more information\n"
  35.      "on the distribution of WBSplitter.\n\n"
  36.      "WBSplitter © 1992-1994 Michael Meier\n"
  37.      "All rights reserved."
  38. ))
  39.  
  40. ;=============================================================================
  41. ; make sure we are running under a 2.04 ROM
  42.  
  43. (if (< (/ (getversion) 65536) 37)
  44. (
  45. (abort #bad-kick)
  46. ))
  47.  
  48. ;=============================================================================
  49.  
  50. (message #install-msg)
  51.  
  52. (set prgdir
  53.  (askdir
  54.  (prompt #where-prg)
  55.  (help @askdir-help)
  56.  (default "Sys:Utilities")
  57.  )
  58. )
  59.  
  60. (copyfiles
  61.  (source Splitterprg)
  62.  (dest prgdir)
  63.  (infos)
  64.  (noposition)
  65. )
  66.  
  67. (if 
  68.  (askbool
  69.   (prompt (#confirm-doc))
  70.    (help @askbool-help)
  71.    )
  72.   (
  73.    (set docdir
  74.    (askdir
  75.    (prompt #where-doc)
  76.    (help @askdir-help)
  77.    (default prgdir)
  78.   )
  79.  )
  80.  (copyfiles
  81.   (source Splitterdoc)
  82.   (dest docdir)
  83.   (infos)
  84.   (noposition)
  85.   )
  86.  )
  87. )
  88.  
  89. (copylib
  90.  (prompt "\n" #copy-reqtools)
  91.  (help @copylib-help)
  92.  (source rqtlib)
  93.  (dest "Libs:")
  94.  (confirm)
  95. )
  96.  
  97.  
  98. (if 
  99.  (askbool
  100.   (prompt (#confirm-lha))
  101.    (help @askbool-help)
  102.   )
  103.  (
  104.  (set lhadir
  105.  (askdir
  106.   (prompt #where-lha)
  107.    (help @askdir-help)
  108.   (default "C:")
  109.   )
  110.  )
  111.   (copylib
  112.    (prompt "\n" #copy-lha)
  113.    (help @copylib-help)
  114.    (source lhafile)
  115.    (dest lhadir)
  116.    (confirm)
  117.   )
  118.  )
  119. )
  120.  
  121.